UC知道二级Access题目`
来源：百度知道 编辑：UC知道 时间：2024/06/22 08:02:10
在窗体上添加一个命令按钮，然后编写如下程序，
Private Sub Command1_Click()
n=InputBox("")
n=Val(n)
i=2
t=-1
Do While i*i<=n
If n Mod i=0 Then
t=0
End If
i=i+1
Loop
MsgBox t
End Sub
打开窗体运行后，单击命令按钮，消息框的输出结果为？
这是一道笔试题，答案是-1。
哪位懂的朋友，可以给我讲下啊，越简单，通俗易懂越好！
不胜感激啊！
Private Sub Command1_Click()
n=InputBox("")
n=Val(n)
i=2
t=-1
Do While i*i<=n
If n Mod i=0 Then
t=0
End If
i=i+1
Loop
MsgBox t
End Sub
打开窗体运行后，单击命令按钮，消息框的输出结果为？
这是一道笔试题，答案是-1。
哪位懂的朋友，可以给我讲下啊，越简单，通俗易懂越好！
不胜感激啊！
Private Sub Command1_Click()
n=InputBox("") //键盘输入
n=Val(n) //输入取值
i=2
t=-1
Do While i*i<=n //循环 满足条件i方大于n退出
If n Mod i=0 Then //mod是取模的意思 n能整除i
t=0 //则t=0
End If
i=i+1 //i+1
Loop //下一循环
MsgBox t //输出t
End Sub